home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 September (IDG) / Sep99.iso / Shareware World / Comms & Internet / LinkConverter 1.1.2 / Dialog Director v0.7 / Examples / Message.as < prev    next >
Encoding:
Text File  |  1998-01-12  |  598 b   |  17 lines  |  [TEXT/ToyS]
  1. property sp : "                    "
  2. property msg : "Now is the time for all good men to come to the aid of the party."
  3. property msgDialog : {size:[500, 80], name:"A message for you!", style:movable dialog, contents:[¬
  4.     {class:static text, contents:"", bounds:[0, 5, 20245, 75], font:{size:48}}]}
  5.  
  6. set m to sp & sp & msg & sp
  7. dd install with grayscale
  8. set d to dd make dialog msgDialog
  9. try
  10.     repeat with i from 1 to m's length
  11.         repeat 8000 times
  12.         end repeat -- dd interact with user for max ticks 15
  13.         dd set contents of item 1 of d to text i thru -1 of m
  14.     end repeat
  15. on error
  16. end try
  17. dd uninstall